home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / act1 / 00186.ls < prev    next >
Encoding:
Text File  |  1995-04-03  |  923 b   |  40 lines
  1. on mouseUp
  2.   global TRIAL, numberbugs, backframe3, showing, doneit, game1level
  3.   if game1level <> 3 then
  4.     exit
  5.   end if
  6.   spuppet(1, 18)
  7.   play frame string(the clickOn - 24)
  8.   go(backframe3)
  9.   puppetSprite(the clickOn - 24 + 37, 1)
  10.   set the castNum of sprite (the clickOn - 24 + 37) to the number of cast string(the clickOn - 24)
  11.   if the optionDown and the commandDown then
  12.     set doneit to [1]
  13.   end if
  14.   set TRIAL to TRIAL + 1
  15.   if TRIAL > 3 then
  16.     set TRIAL to 3
  17.   end if
  18.   play frame "wrong3" & TRIAL
  19.   if TRIAL > 2 then
  20.     puppetSprite(37 + numberbugs, 0)
  21.     play frame string(numberbugs)
  22.     go(backframe3)
  23.     repeat with xxx = 38 to 47
  24.       puppetSprite(xxx, 1)
  25.     end repeat
  26.     highlight()
  27.     go(backframe3 + 1)
  28.     supuppet(1, 18)
  29.     set showing to 1
  30.     exit
  31.   end if
  32.   if TRIAL = 2 then
  33.     go(backframe3)
  34.     play frame "hint"
  35.     go(backframe3)
  36.   end if
  37.   supuppet(1, 18)
  38.   go(backframe3)
  39. end
  40.